;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; server-mode
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;(setq server-name system-name)
;(setq server-socket-dir (concat home-emacs-d "server"))
(server-start)
;(add-hook 'kill-emacs-hook
;        (lambda()
;                (if (file-exists-p )
;                   (delete-file    ))))
